Aminet 34/Aminet 34 (2000)(Schatztruhe)[!][Dec 1999].iso/Aminet/comm/irc/cybershiela.lha/cs/cs_bot.amirx

Text File | 1999-07-05 | 1KB | 24 lines

/* CyberShiela MultiResponse File */
nick=getclip('NICK')
xx=random(1,10,time('s'))
select
when xx=1 then a="Whos the fucking bot? Is it me?  I sure hope you don't think I'm a bot."
when xx=2 then a="$1, Call me 'bot' one more fucking time and I'm gonna slam you so fucking hard, you'll see tomorrow!"
when xx=3 then a="Yeah yeah, so what exactly is a bot $1?"
when xx=4 then a="A Bot: {noun} A machine/program that carries out automated functions."
when xx=5 then a="If I'm a Bot, you must be a fucking chaw chompin' redneck $1."
when xx=6 then a="Kiss my silicone butt $1."
when xx=7 then a="Would a bot talk to you like this $1?"
when xx=8 then a="$1.. you don't even have a fucking clue! haha"
when xx=9 then a="$1 = Lamer Extreme"
when xx=10 then a="Did your mother have any children that lived $1?"
end
modif:
user=nick
old=a
m=length(user);temp=a;x=pos("$1",temp);if x~=0 then do;temp2 = delstr(temp,x,2);old = insert(user,temp2,x-1,m," ");end
temp=old;m=length(channam);x=pos("$chan",temp);if x~=0 then do;temp2 = delstr(temp,x,5);old = insert(channam,temp2,x-1,m," ");end
a=old
'say 'A
exit